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DIRECTORY 

BcdDefs: FROM "bcddefs", 

LoaderBcdUtilDefs: FROM "Loaderbcduti Idefs" , 
ControlDefs: FROM "ControlDef s'\ 
LoadStateOefs: FROM "loadstatedefs" ; 

DEFINITIONS FROM LoadStateDef s , LoaderBcdUtilDefs, BcdDefs; 

BcdMergeDefs: DEFINITIONS - BEGIN 

GlobalFrameHandle: TYPE = ControlDefs. GlobalFrameHandle; 

MergeModule: PROCEDURE [frame, copied: GlobalFrameHandle, initialGFT: LoadStateGFT] ; 

MergeBcd: PROCEDURE [mergee: BcdBase, RealFromRel: Relocation, config: Configlndex, 
initialGFT: LoadStateGFT, code, symbols: BOOLEAN, bcdname: STRING]; 

MergedBcdSize: PROCEDURE RETURNS [size: CARDINAL]; 

WriteMergedBcd: PROCEDURE [movewords: PROCEDURE [POINTER, CARDINAL]]; 

Initial izeMerge: PROCEDURE [sizeof table: CARDINAL, lastrealgfi: ControlDefs .GFTIndex] ; 

FinalizeMerge: PROCEDURE; 

END. 


